1) Cho doan chuong trinh sau:

s1:= '1234' s2:='abc'

If length(s1) < length(s2) then writeln(s1) else writeln(s2);

Ket qua in ra man hinh la:

A. '1234'      B. 'abc'       C. '1234abc'           D. 'abc1234'

1) Cho doan chuong trinh sau:

s:= 'ABCDEF'

delete(s,3,2);

insert('XYZ',s,1);

write(s);

Ket qua in ra man hinh la:

A. 'ABXYZEF'       B. 'ABEXYZF'        C. 'AXYZ'        D. 'AXYZBEF'

Cho đoạn chương trình sau:

s1 := ‘123’; s2 := ‘abc’;

insert(s1 , s2 , 1);

write(s1);

Kết quả in ra màn hình là:

A. ‘a123bc’

B. ‘1abc23’

C. ‘123’

D. ‘abc’

Cho đoạn chương trình sau:

s1 := ‘123’; s2 := ‘abc’;

insert (s2 , s1 , 1);

write(s1);

Kết quả in ra màn hình là:

A. ‘123abc’

B. ‘abc’

C. ‘123’

D. ‘abc123’

Cho đoạn chương trình sau:

s1 := ‘123’; s2 := ‘abc’;

insert(s1 , s2 , 2);

write(s1);

Kết quả in ra màn hình là:

A. ‘a123bc’

B. ‘1abc23’

C. ‘123’

D. ‘abc’

Cho đoạn chương trình sau:

s1 := ‘123’; s2 := ‘abc’;

insert(s2 , s1 , 2);

write(s2);

Kết quả in ra màn hình là:

A. ‘a123bc’

B. ‘1abc23’

C. ‘123’

D. ‘abc’

1) Cho doan chuong trinh sau: 

s:= 'abcde'

write(pos('cba',s));

Ket qua in ra man hinh la:

A. 0          B.'0'        C.3        D.'3'

Cho đoạn chương trình sau:

s1 := ‘123’; s2 := ‘abcd’;

insert (s1, s2 ,1);

write(s2);

Kết quả in ra màn hình là:

A. ‘ab123cd’

B. ‘a123bcd’

C. ‘123abcd’

D. ‘abc123d’